// LEVEL1.HDR - PUP LEVEL 1 DECLARATIONS
// Copyright Xerox Corporation 1979

GLOBAL
[
OPENLEVEL1SOCKET	:150	//PUP ROUTINES
CLOSELEVEL1SOCKET	:151
GETPBI			:152
RELEASEPBI		:153
APPENDSTRINGTOPUP	:154
SETPUPDPORT		:155
SETPUPSPORT		:156
COMPLETEPUP		:157
PUPLEVEL1		:158
BROADCASTNEXTNET	:159
SETPUPCHECKSUM		:160
PUPCHECKSUM		:161
INITPUPLEVEL1		:162

INITROUTINGTABLE	:165	//ROUTING ROUTINES
INITFORWARDER		:166
FORWARDER		:167
FORWARDERCTX		:168
GATEWAYLISTENER		:169
HHASH			:170
HLOOKUP			:171
HINSERT			:172
HDELETE			:173
HENUMERATE		:174

MULTEQ			:180	//SERVICE ROUTINES
MAX			:181
MIN			:182
DOUBLEINCREMENT		:183

NDBQ			:190	//PUP STATICS
PBIFREEQ		:191
PBIIQ			:192
PBITQ			:193
SOCKETQ			:194
GATEWAYIQ		:195
DPSIB			:196
NUMNETS			:197
PUPZONE			:198
PUPCTXQ			:199
LENPBI			:200
LENPUP			:201
MAXPUPDATABYTES		:202
PUPLEVEL1CTX		:203

PUPRTCHANGED		:206	//ROUTING STATICS
PUPRT			:207
UNKNOWNNET		:208
GATEWAYLISTENERSOC	:209
]

//------------------------------------------------------------------
MANIFEST 	//STRUCTURE PUPSOC:
//------------------------------------------------------------------
[
PUPSOCLINK	=0	// LINK TO NEXT SOCKET
PSIB		=1
MAXTPBI		=1
NUMTPBI		=1	// TOTAL PBIS ALLOWED, NOW ASSIGNED
MAXIPBI		=2
NUMIPBI		=2	// INPUT PBIS ALLOWED, NOW ASSIGNED
MAXOPBI		=3
NUMOPBI		=3	// OUTPUT PBIS ALLOWED, NOW ASSIGNED
LEV1STATUS	=4	// STATUS BITS DEFINED AT LEVEL 1
LCLPORT		=5	// LOCAL PORT
LCLNET		=5	// LOCAL NET ADDRESS
LCLHOST		=5	// LOCAL HOST ADDRESS
LCLSOCKET	=6	// LOCAL SOCKET ADDRESS
FRNPORT		=8	// FOREIGN PORT
FRNNET		=8	// FOREIGN NET ADDRESS
FRNHOST		=8	// FOREIGN HOST ADDRESS
FRNSOCKET	=9	// FOREIGN SOCKET ADDRESS
IQ		=11	// SOCKET INPUT QUEUE
IQHEAD		=11
IQTAIL		=12
]
MANIFEST
[
LENPUPSOC	=13
LENPSIB		=4
]

//------------------------------------------------------------------
MANIFEST 	//STRUCTURE RTE:
//------------------------------------------------------------------
[
NET		=0	// MATCHED AGAINST KEY; NEGATIVE => INVALID
RECENT		=1	// THIS ENTRY HAS BEEN UPDATED RECENTLY
HOPS		=1	// HOP COUNT; 0 => HOST DIRECTLY CONNECTED
HOST		=1	// GATEWAY HOST NUMBER
DNDB		=2	// -> NDB FOR IMMEDIATE DESTINATION NET
RTETIMER	=3	// TIMEOUT FOR DECLARING ENTRY OBSOLETE
]
MANIFEST
[
LENRTE = 4
]

// INVALID VALUE OF NET WORD IN RTE
MANIFEST
[
RTFREEENTRY = -1	// ENTRY IS FREE
]

// HIGHEST LEGAL VALUE OF PUP HOP COUNT
MANIFEST
[
MAXHOPS = 15
]

MANIFEST
[
// ERROR PROTOCOL
TYPEERROR = 4

// SYS.ERRORS CODES
ECNOSUCHSOCKET = 2220
ECBADALLOCATION = 2221
ECNONETWORKINTERFACE = 2222
ECPUPRTFULL = 2223
]